home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / COMAL / B-Book Series / (k)b8.d64 / demo 2.4.l < prev    next >
Text File  |  2007-02-28  |  235b  |  12 lines
  1. 0010 SETGRAPHIC 0
  2. 0020 BACKGROUND 0
  3. 0030 CLEAR 
  4. 0040 X:=8
  5. 0050 DIM TEXT$ OF 14
  6. 0060 COUNTER:=10
  7. 0070 TEXT$:="I SPEAK COMAL!"
  8. 0080 FOR SHOW:=100 TO 50 STEP -X DO
  9. 0090 PLOTTEXT COUNTER,SHOW,TEXT$
  10. 0100 COUNTER:=COUNTER+X
  11. 0110 ENDFOR SHOW
  12.